perm filename LIBPAS.NDF[PAS,SYS] blob sn#574722 filedate 1981-03-27 generic text, type T, neo UTF8
  1) LIBPAS.PAS[PAS,SYS] and 2) LIBPAS.OLD[PAS,SYS]	3-27-81 14:18	pages 16,16

**** File 1) LIBPAS.PAS[PAS,SYS]/16P/157L
1)					      IF (gaddr > ord(accus)) OR
1)						  (gaddr < ord(acrpoint(accus↑[0+15B],right))) THEN
1)						  BEGIN
**** File 2) LIBPAS.OLD[PAS,SYS]/16P/157L
2)					      IF (gaddr >= ord(accus)) OR
2)						  (gaddr <= ord(acrpoint(accus↑[0+15B],right))) THEN
2)						  BEGIN
***************